RRRRRRRRRRRR UUU UUU NNN NNN 000000000 FFFFFFFFRRRFFFRFR FRFRRRRRRRRRPRFFF 
RRRRRRRRRRRR UUU UUU NNN NNN 000000000 FFFFFFFRFRRRFRRRFR FRRRRRRPRRPPR PPE 
RRRRRRRRRRRR UUU UUU NNN NNN 000000000 FFFFFRRRFRRRRFRFR FPRRRRRRRRRR FFF 
RRR RRR UUU UUU NNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNN NNN 000 OOO FFF FFF 

RRR RRR UUU UUU NNN NNN 000 OOO FFF FFF 

RRR RRR UUU NNNNNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNNNNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNNNNN NNN 000 000 FFF FFF 
RRRRRRRRRRRR UUU UUU NNN NNN NNN 000 OOO FFFFFFFFFFFF FFFFFFFFFFFF 
RRRRRRRRRRRR UUU UUU NNN NNN NNN 000 COO FFFFFFFFFFFF FFFFFFFFFFFF 
RRRRRRRRRRRR UUU UUU NNN NNN NNN OOO OOO FFFFFFFFFFFF FFFFFFFFFFFF 
RRR = RRR UUU UUU NNN NNNNNN 000 000 FFF FFF 

RRR = =RRR UUU UUU NNN NNNNNN 000 000 FFF FFF 

RRR = =RRR UUU NNN NNNNNN 000 FFF FFF 

RRR R UUU UUU NNN NNN 0O0G 000 FFF FFF 

RRR RRR UUU UUU NNN NNN 000 000 FFF FFF 

RRR RRR UUU UUU NNN NNN 000 000 FFF FFF 

RRR RRR UUUUUUUUUUUUUUU NN NNN 000000000 FFF FFF 

RRR RRR UUUUUUUUUUUUUUU NNN NNW 000000000 FFF FFF 

RRR RRR UUUUUUUUUUUUUUU =~ NNN NNN 006000000 FFF FFF 


**FILE**1D**PERIOD 
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5 | 

PERIOD 18-5 Sep-1984 AX-11 Bliss-32 V4.0-74 Page 1| P 

14-Sep orks $hi85%2 RUNOFF .SRCIP ERIOD BL {si 8 v 
3 1 01 MODULE PERIOD ( ' | 3 
; § 8 IDENT = ‘v04-000' : 
3 P %BL1SS32C | : 
: : P one ADDRESSING MODE (EXTERNAL=LONG_RELATIVE ,NONEXTERNAL=LONG_RELATIVE) : 
: § B006 d= ; 
we b008 1 Cron 
: 1% 484 i leunteneeeeeenereennnenentnenneetenereneretrentrntenettentneneneneeetnntnetes : 
: :* * : 
; 0011 1 !« COB YRIGHT (c) 1978, 1980, 1982, 1984 BY * 3 
; ig O1¢ 1 i® DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. . ; 
; F Satz : re ALL RIGHTS RESERVED. * : 
° . ® e 
$ 15 0015 1 !* THIS fo ocrie 4 FURNISHED UNDER A LICENSE AND MAY BE USED AND gt ht * + 
; Bate 1 !* ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE * : 
3 17 001 1 !'® INCLUSION OF rae ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER * P4 
: 18 0018 1 !* COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY * : 
3 19 0019 1 !* OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * ; 
; $f Bast : - TRANSFERRED. + 3 
; ! < 3 
3 $$ OOss 1 !'* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * : 
3 2 00 1 !* AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT * : 
3 $e 0095 ; * CORPORATION. * 3 
3 '® * r 
3 26 0026 1 !* DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS ® : 
: e?7 0027 1 !* SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. * : 
.— oa 0028 1 !* * : 
; @& 0029 1 !« * 3 
3 i Boe ! peteesesenesaconsseseserenaneceseeecereseeseneeneeondenanssserenesooennenetes 3 
ee 003¢ 1 ise , 
H i 5 \ FACILITY: DSR (Digital Standard RUNOFF) / DSRPLUS 
: 35 0035 1 | ABSTRACT: Processes the .PERIOD and .NO PERIOD commands 
; 0036 1! 
5 ae 0037 1! 
; 0038 1 ! ENVIRONMENT: Transportable 
= 0039 1! 
s 40 0040 1 ! AUTHOR: R.W.Friday CREATION DATE: July, 1978 
; 41 0041 1! 
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Ve-8ep-1984 13:67:48 ERUNOFF SRESPERIOD-OL 171 
SBTTL ‘Revision History’ 
MODIFIED BY: 
002 KAD00002 Keith Dawson 07-Mar-1983 


Global edit of all modules. Updated module names, idents, 
copyright dates. Changed require files to BLISS library. 
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PERIOD 1b-se -1984 01:27:3 AX-11 Bliss-32 V4.0-742 Page 3 
v04-000 Module Level Declarations aoe 1 04:37:38 RUNOFF .SRCJPERIOD.BLI;1 . (3) 
2 ? 0051 } XSBITL "Module Level Declarations’ 
; 5 8 5 1! 
+ § 054 1 ! TABLE OF CONTENTS: 
; 055 1! 
; 8 B28 1! 
3 9 5 1 ! INCLUDE FILES: 
; & 058 1! 
. 0059 1 
: 6 0060 1 LIBRARY ‘NXPORT:XPORT'; ' XPORT Library 
3 o7 Boe! : REQUIRE ‘REQ:RNODEF'; ' RUNOFF variant definitions 
3 65 U 8198 1 ZIF DSRPLUS XTHEN 
3 66 U 0194 1 LIBRARY ‘REQ:DPLLIB'; ! DSRPLUS BLISS Library 
; 67 0195 1 XELSE 
: 68 0196 1 LIBRARY ‘REQ:DSRLIB'; ! DSR BLISS Library 
s 6&9 0197 1 XFI 
; 0198 #1 
; 71 0199 1°! 
; 7 0200 1 ! MACROS 
he 0201 1! 
; ps0¢ 2s 
3 75 020 1 ! EQUATED SYMBOLS: 
; bsge 1! 
Pmt ¢ s 0205 1! 
; 78 0206 1 ! OWN STORAGE: 
: 79 Bebe | 
; 0208 1! 
3 81 0209 1 ! EXTERNAL REFERENCES: 
. a 0210 1! 
; § 0211 #1 
ee.) at 1 EXTERNAL 
3 85 021 1 SCA : SCA_DEFINITION; 
;s 0214 1 


; Routine Size: 27 bytes, 


52 -1984 :3 AX=-11 Bliss-3 -74 
v04-0 Module Level Declarations 16- 8ep-1984 9}: 83 8 RUNOFF -SRCIP 2618 a braet 
; 88 15 GLOBAL ROUTINE PERIOD (HANDLER_CODE) : NOVALUE = 
: 90 13 1 44 
31 18 i FUNCTIONAL DESCRIPTION: 

; 93 g See the ABSTRACT, above. 
; 99 ‘ ; FORMAL PARAMETERS: 
; $7 : : HANDLER_CODE indicates which command is to be processed. 
: 99 1 | IMPLICIT INPUTS: 
HR REY mute corms: tom 
; 192 05959 1 i a 
: 10 0 0 1 ! ROUTINE VALUE: 
104 0 COMPLETION CODES: None 
: 106 0 1 | SIDE EFFECTS: N 
407 0386 1 | — 
: 108 0235 1 i- 
: 109 0 36 1 
: 110 0 3 BEGIN 
; 111 " 38 IF .HANDLER_CODE EQL H_PERIOD 
: 18 0240 SCA_PERIOD = TRUE 
: 118 6 a3 SCA_PERIOD = FALSE; 
: 116 ogee 1 ND: 7 ’ 'End of PERIOD 
.TITLE PERIOD 
“IDENT \V04-000\ 
.EXTRN SCA 
.PSECT S$CODES,NOWRT,2 
0000 00000 ENTRY PERIOD, Save nothin 
000000AB 8F 06 Ac} 90002 CMPL- HANDLER_CODE, #171 
08 12 OOOOA BNEG =-'1$ 
000000006 FF 01 00 9000¢ MGVL #1, aSCA+128 
04 0001 RET 
000000006 FF b4 b001% 1$ CLRL  aSCA+128 
4 OOO1A RET 


Routine Base: S$CODE$ + 0000 


‘End of module 
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16-Sep-1984 01:27:3 AX-11 Bliss-32 V4.0-74 P 
v04-000 Module Level Declarations 12288-1382 94:55:28 RUNOFF .SRC PERIOD Bei iei vt 
; PSECT SUMMARY ; 
: Name Bytes Attributes : 
: SCODES 27 NOVEC,NOWRT, RD, EXE,NOSHR, LCL, REL, CON,NOPIC,ALIGN(2) ‘ 
3 Library Statistics 3 
Se ee ee Symbols -------- Pages Processing : 
3 File Total Loaded Percent Mapped Time " 
;  $255$DUA28: :ESYSL 1BIXPORT 32:1 590 0 0 252 00:00.1 : 
; 7$255$DUA28: CRUNOFF .SRCJDSRLIB.L32;1 1248 6 0 86 00:00.2 : 
; COMMAND QUALIFIERS : 
; BLISS/CHECK=(FIELD, INITIAL ,OPTIMIZE)/LIS=LIS$:PERIOD/OBJ=OBJ$:PERIOD MSRC$:PERIOD/UPDATE=(ENH$:PERIOD) ; 
; : 27 code + 0 data bytes F 
; Run Time: 0:02. : 
3 eee Time: 00:08.5 3 
3 Lines/CPU Min: 897 : 
3 ovens scans 168 : 
3 penser Used: 19 pages : 
; Compilation Complete : 
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